home *** CD-ROM | disk | FTP | other *** search
/ Star Festival... a Return to Japan / Star Festival... a Return to Japan.iso / pc / STARFESTIVAL / 07r.dir / 00001.ls next >
Encoding:
Text File  |  1999-04-02  |  1.8 KB  |  72 lines
  1. on startMovie
  2.   global gCursorReady, gKnobState, gMagCursor, gsearchOn, qtChan, gKnobSprite, gSendMovie, gCurrentLocation
  3.   puppetSprite(44, 1)
  4.   gCursorReady = 1
  5.   gMagCursor = "magCursor"
  6.   gCurrentLocation = 7
  7.   puppetSound(0)
  8.   gSendMovie = "07r"
  9.   qtChan = 35
  10.   sprite(qtChan).volume = 256
  11.   cast("modmem").directToStage = 1
  12.   preLoad(qtChan - 1)
  13.   initGlobals()
  14.   gKnobSprite = 17
  15.   setUpKnob()
  16.   set the mouseDownScript to EMPTY
  17.   set the mouseUpScript to EMPTY
  18.   if gsearchOn = 1 then
  19.     sprite(6).visible = 1
  20.   else
  21.     sprite(6).visible = 0
  22.   end if
  23. end
  24.  
  25. on idle
  26.   global gCursorReady
  27.   if gCursorReady = 1 then
  28.     cursor(200)
  29.     checkCursors()
  30.     set the locH of sprite 44 to the mouseH
  31.     set the locV of sprite 44 to the mouseV
  32.     updateStage()
  33.   end if
  34. end
  35.  
  36. on checkCursors
  37.   global gMagCursor
  38.   set the castNum of sprite 44 to the number of member "curs1"
  39.   if rollOver(5) then
  40.     set the castNum of sprite 44 to the number of member "hotCursor"
  41.   end if
  42.   if rollOver(22) then
  43.     set the castNum of sprite 44 to the number of member "hotCursor"
  44.   end if
  45.   repeat with i = 8 to 12
  46.     if rollOver(i) then
  47.       set the castNum of sprite 44 to the number of member "hotCursor"
  48.     end if
  49.   end repeat
  50.   repeat with i = 14 to 21
  51.     if rollOver(i) then
  52.       set the castNum of sprite 44 to the number of member "hotCursor"
  53.     end if
  54.   end repeat
  55.   repeat with i = 24 to 28
  56.     if rollOver(i) then
  57.       set the castNum of sprite 44 to the number of member "hotCursor"
  58.     end if
  59.   end repeat
  60.   if rollOver(36) then
  61.     set the castNum of sprite 44 to the number of member "hotCursor"
  62.   end if
  63.   if rollOver(37) then
  64.     set the castNum of sprite 44 to the number of member "nonCursor"
  65.   end if
  66.   repeat with i = 40 to 42
  67.     if rollOver(i) then
  68.       set the castNum of sprite 44 to the number of member "hotCursor"
  69.     end if
  70.   end repeat
  71. end
  72.